extern int xsetua_(integer *iunita, integer *n);
/*:ref: xermsg_ 14 8 13 13 13 4 4 124 124 124 */
/*:ref: j4save_ 4 3 4 4 12 */
